myvar_0 = GetPrimitiveParameter(0)
myvar_1 = GetPrimitiveParameter(1)
myvar_2 = GetPrimitiveParameter(2)
myvar_3 = GetObjectData(myvar_0, ObjData["room"])
myvar_4 = GlobalObjManager["getLoadBearingRoom"](GlobalObjManager, myvar_0)
myvar_5,myvar_6,myvar_7 = nWorld["GetObjectLocation"](myvar_0)
myvar_12 = GlobalObjManager["createNewObject"](GlobalObjManager, 895755718)
SetTemp(0, myvar_12)
SetScriptReturnValue(True)
local myvar_15 = 1
for myvar_1=nil, myvar_2, myvar_15 do 
myvar_16 = math["random"](4)
local myvar_17 = 0
local myvar_18 = 3
local myvar_19 = 1
for myvar_17=0, myvar_18, myvar_19 do 
	if (3 < (myvar_17 + myvar_16)) then
end
	if (((myvar_17 + myvar_16) - 4) == 0) then
		if (True ~= 0) then 


			if (myvar_3 ~= nWorld["GetRoomAtLocation"](myvar_5, (myvar_6 + myvar_1), myvar_7)) then
				if (myvar_4 == nWorld["GetLoadBearingRoomAtLocation"](myvar_5, (myvar_6 + myvar_1), myvar_7)) then
				for 0=0, myvar_1, 1 do 
					if (myvar_1 < (math["random"](-myvar_1, myvar_1) + 1)) then
				end
					if (nWorld["CanMoveObjectToLocation"](myvar_12, (myvar_5 + -myvar_1), (myvar_6 + myvar_1), myvar_7) ~= 0) then 


						if (nWorld["IsLoadWallBetweenPoints"](myvar_5, myvar_6, myvar_7, (myvar_5 + -myvar_1), (myvar_6 + myvar_1), myvar_7) ~= 1) then 


						nWorld["MoveObjectToLocation"](myvar_12, (myvar_5 + -myvar_1), (myvar_6 + myvar_1), myvar_7)
						return 
					end
				end
				end
			else
				local myvar_8 = False
			else
					if (((myvar_17 + myvar_16) - 4) == 1) then
						if (True ~= 0) then 


							if (myvar_3 ~= nWorld["GetRoomAtLocation"]((myvar_5 + myvar_1), myvar_6, myvar_7)) then
								if (myvar_4 == nWorld["GetLoadBearingRoomAtLocation"]((myvar_5 + myvar_1), myvar_6, myvar_7)) then
								for 0=0, myvar_1, 1 do 
									if (myvar_1 < (math["random"](-myvar_1, myvar_1) + 1)) then
								end
									if (nWorld["CanMoveObjectToLocation"](myvar_12, (myvar_5 + myvar_1), (myvar_6 + -myvar_1), myvar_7) ~= 0) then 


										if (nWorld["IsLoadWallBetweenPoints"](myvar_5, myvar_6, myvar_7, (myvar_5 + myvar_1), (myvar_6 + -myvar_1), myvar_7) ~= 1) then 


										nWorld["MoveObjectToLocation"](myvar_12, (myvar_5 + myvar_1), (myvar_6 + -myvar_1), myvar_7)
										return 
									end
								end
								end
							else
								local myvar_9 = False
							else
									if (((myvar_17 + myvar_16) - 4) == 2) then
										if (True ~= 0) then 


											if (myvar_3 ~= nWorld["GetRoomAtLocation"](myvar_5, (myvar_6 - myvar_1), myvar_7)) then
												if (myvar_4 == nWorld["GetLoadBearingRoomAtLocation"](myvar_5, (myvar_6 - myvar_1), myvar_7)) then
												for 0=0, myvar_1, 1 do 
													if (myvar_1 < (math["random"](-myvar_1, myvar_1) + 1)) then
												end
													if (nWorld["CanMoveObjectToLocation"](myvar_12, (myvar_5 + -myvar_1), (myvar_6 - myvar_1), myvar_7) ~= 0) then 


														if (nWorld["IsLoadWallBetweenPoints"](myvar_5, myvar_6, myvar_7, (myvar_5 + -myvar_1), (myvar_6 - myvar_1), myvar_7) ~= 1) then 


														nWorld["MoveObjectToLocation"](myvar_12, (myvar_5 + -myvar_1), (myvar_6 - myvar_1), myvar_7)
														return 
													end
												end
												end
											else
												local myvar_10 = False
											else
													if (((myvar_17 + myvar_16) - 4) == 3) then
														if (True ~= 0) then 


															if (myvar_3 ~= nWorld["GetRoomAtLocation"]((myvar_5 - myvar_1), myvar_6, myvar_7)) then
																if (myvar_4 == nWorld["GetLoadBearingRoomAtLocation"]((myvar_5 - myvar_1), myvar_6, myvar_7)) then
																myvar_21 = math["random"](-myvar_1, myvar_1)
																local myvar_22 = 0
																local myvar_24 = 1
																for myvar_22=0, myvar_1, myvar_24 do 
																myvar_21 = myvar_21 + 1
																	if (myvar_1 < myvar_21) then
																	myvar_21 = -myvar_1
																end
																	if (nWorld["CanMoveObjectToLocation"](myvar_12, (myvar_5 - myvar_1), (myvar_6 + myvar_21), myvar_7) ~= 0) then 


																		if (nWorld["IsLoadWallBetweenPoints"](myvar_5, myvar_6, myvar_7, (myvar_5 + myvar_21), (myvar_6 - myvar_1), myvar_7) ~= 1) then 


																		nWorld["MoveObjectToLocation"](myvar_12, (myvar_5 - myvar_1), (myvar_6 + myvar_21), myvar_7)
																		return 
																	end
																end
																end
															else
																local myvar_11 = False
															end
														end
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end
end
end
local myvar_14 = False
SetScriptReturnValue(myvar_14)
return 
